From 00832e01226df95a58a4fb29bc3f873fc6a6c9d5 Mon Sep 17 00:00:00 2001 From: Jay Belanger Date: Mon, 2 Nov 2009 02:56:43 +0000 Subject: [PATCH] (calc-date-notation): Check to see if the format is whitespace instead of only the empty string. --- lisp/calc/calc-forms.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/calc/calc-forms.el b/lisp/calc/calc-forms.el index 99a8b949c42..0845fb151ab 100644 --- a/lisp/calc/calc-forms.el +++ b/lisp/calc/calc-forms.el @@ -81,7 +81,7 @@ (defun calc-date-notation (fmt arg) (interactive "sDate format (e.g., M/D/YY h:mm:ss): \nP") (calc-wrapper - (if (equal fmt "") + (if (string-match-p "\\`\\s-*\\'" fmt) (setq fmt "1")) (if (string-match "\\` *[0-9] *\\'" fmt) (setq fmt (nth (string-to-number fmt) calc-standard-date-formats))) -- 2.30.2